﻿Public Class paginaPrincipal

    Private Sub paginaPrincipal_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub btnRegistrar_Click(sender As Object, e As EventArgs) Handles btnRegistrar.Click

        Dim nombre As String
        Dim masa As Double
        Dim tipo As String
        Dim temperatura As Double
        Dim duracion As Double
        Dim edad As Double
        Dim composicion As String
        Dim intensidad As Double
        Dim tamanno As Double

        nombre = txtNombre.Text
        masa = Convert.ToDouble(Replace(Me.txtNombre.Text, ".", ","))

    End Sub

    Private Sub RegistrarToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles RegistrarToolStripMenuItem.Click
        Me.Hide()
        registrarSatelite.Show()
    End Sub
End Class